home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 003 / rcheck.arc / PRINTDT.CMD < prev    next >
Encoding:
Text File  |  1984-12-18  |  896 b   |  25 lines
  1. *(   PRINTDT.CMD     FROM PRINTING MENUS  PRINT?.CMD                        )
  2. *(   RICHARD T. TRABAND                                                     )
  3. *(                           *** THIS FILE NEEDS CHANGING ****              )
  4. IF MAIN LT 10 THEN
  5.    NEWPAGE
  6.    TYPE b:BUDCATDT.MNU
  7.    FILLIN BEGDAT USING "ENTER STARTING DATE  "  AT  6 20
  8.    FILLIN ENDDAT USING "ENTER ENDING DATE    "  AT 12 20
  9. ENDIF
  10. IF MAIN GT 10 THEN
  11.    TYPE b:BUDCATDT.MNU
  12.    FILLIN BEGDAT USING "ENTER STARTING DATE  " AT 10 20
  13.    FILLIN ENDDAT USING "ENTER ENDING DATE    " AT 16 20
  14. ENDIF
  15. NEW
  16. SET VAR BEG = "BEGINNING DATE TO BE USED = "
  17. SET VAR END = "ENDING DATE TO BE USED =    "
  18. SHOW VAR BEG AT 2 10
  19. SHOW VAR END AT 7 10
  20. SHOW VAR BEGDAT AT 2 50
  21. SHOW VAR ENDDAT AT 7 50
  22. FILLIN MAIN USING "PRESS [ENTER] TO CONTINUE" AT 20 20
  23.  
  24.  
  25.